home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / taskv1 / classlis.frm next >
Text File  |  1994-08-15  |  4KB  |  116 lines
  1. VERSION 2.00
  2. Begin Form ClassList 
  3.    BackColor       =   &H00C0C0C0&
  4.    BorderStyle     =   3  'Fixed Double
  5.    ClientHeight    =   3675
  6.    ClientLeft      =   1425
  7.    ClientTop       =   2250
  8.    ClientWidth     =   5145
  9.    ClipControls    =   0   'False
  10.    ControlBox      =   0   'False
  11.    Height          =   4080
  12.    Left            =   1365
  13.    LinkTopic       =   "Form1"
  14.    MaxButton       =   0   'False
  15.    MinButton       =   0   'False
  16.    ScaleHeight     =   3675
  17.    ScaleWidth      =   5145
  18.    Top             =   1905
  19.    Width           =   5265
  20.    Begin MListBox List2 
  21.       AddItemHeight   =   0
  22.       Alignment       =   0  'None
  23.       AllowFocusRect  =   -1  'True
  24.       BackColor       =   &H00C0C0C0&
  25.       BorderStyle     =   2  'Inset
  26.       CheckColor      =   &H00000000&
  27.       CheckStyle      =   0  'Cross Style
  28.       DrawRegions     =   1
  29.       EnableVirtualMsgs=   0   'False
  30.       ExtendedSelect  =   0   'False
  31.       FallColor       =   &H00808080&
  32.       FindDirection   =   0  'Forward
  33.       FindResult      =   0  'Update ListIndex
  34.       FontBold        =   0   'False
  35.       FontItalic      =   0   'False
  36.       FontName        =   "MS Sans Serif"
  37.       FontSize        =   8.25
  38.       FontStrikethru  =   0   'False
  39.       FontUnderline   =   0   'False
  40.       GridColor       =   &H00808080&
  41.       GridStyle       =   0  'Solid
  42.       Height          =   2415
  43.       HiliteBackColor =   &H00000000&
  44.       HiliteForeColor =   &H00000000&
  45.       HorizontalGrids =   -1  'True
  46.       ImageRegion     =   0
  47.       ImageType       =   0  'None
  48.       ItemHeight      =   800
  49.       ItemWidth       =   1560
  50.       Left            =   150
  51.       ListBoxStyle    =   0  'Fixed
  52.       MaskingColor    =   &H00FFFFFF&
  53.       MultiColumn     =   0   'False
  54.       MultiSelect     =   0   'False
  55.       NoIntegralHeight=   0   'False
  56.       OwnerDraw       =   0   'False
  57.       RiseColor       =   &H00FFFFFF&
  58.       SelectMode      =   0  'Normal
  59.       SortColumn      =   0
  60.       Sorted          =   0   'False
  61.       StringCompare   =   0  'Case Sensitive
  62.       TabIndex        =   1
  63.       Top             =   615
  64.       Version         =   "04.50"
  65.       VerticalGrids   =   0   'False
  66.       VirtualMsgZone  =   0
  67.       Width           =   4830
  68.    End
  69.    Begin CommandButton Close 
  70.       Caption         =   "&Close"
  71.       Default         =   -1  'True
  72.       FontBold        =   0   'False
  73.       FontItalic      =   0   'False
  74.       FontName        =   "MS Sans Serif"
  75.       FontSize        =   8.25
  76.       FontStrikethru  =   0   'False
  77.       FontUnderline   =   0   'False
  78.       Height          =   390
  79.       Left            =   3720
  80.       TabIndex        =   0
  81.       Top             =   3195
  82.       Width           =   1300
  83.    End
  84.    Begin Label DescLabel 
  85.       BackColor       =   &H00C0C0C0&
  86.       Caption         =   "Class Information"
  87.       Height          =   420
  88.       Left            =   165
  89.       TabIndex        =   2
  90.       Top             =   105
  91.       Width           =   4800
  92.    End
  93. End
  94.  
  95. '====================================================================================
  96. 'ClassLis.Frm - Copyright ⌐1994 michiel de bruijn, Rotterdam, The Netherlands
  97. ' Released for public use 16/08/1994. See TASKLIST.WRI for licensing details
  98. '====================================================================================
  99.  
  100. DefInt A-Z
  101.  
  102. Sub Close_Click ()
  103.  
  104. Unload Me
  105.  
  106. End Sub
  107.  
  108. Sub Form_Load ()
  109.  
  110. 'Make our window topmost (most topmost??) to prevent it
  111. 'from hiding behind the task list form
  112. res% = SetWindowPos(Me.hWnd, -1, 0, 0, 0, 0, 3)
  113.  
  114. End Sub
  115.  
  116.